home *** CD-ROM | disk | FTP | other *** search
/ Sprite 1984 - 1993 / Sprite 1984 - 1993.iso / src / lib / c / bit / RCS / Bit_Union.c,v < prev    next >
Text File  |  1988-06-19  |  3KB  |  121 lines
  1. head     1.1;
  2. access   ;
  3. symbols  ;
  4. locks    ; strict;
  5. comment  @ * @;
  6.  
  7.  
  8. 1.1
  9. date     88.06.19.14.34.52;  author ouster;  state Exp;
  10. branches ;
  11. next     ;
  12.  
  13.  
  14. desc
  15. @@
  16.  
  17.  
  18.  
  19. 1.1
  20. log
  21. @Initial revision
  22. @
  23. text
  24. @/* 
  25.  * Bit_Union.c --
  26.  *
  27.  *    Source code for the Bit_Union library procedure.
  28.  *
  29.  * Copyright 1988 Regents of the University of California
  30.  * Permission to use, copy, modify, and distribute this
  31.  * software and its documentation for any purpose and without
  32.  * fee is hereby granted, provided that the above copyright
  33.  * notice appear in all copies.  The University of California
  34.  * makes no representations about the suitability of this
  35.  * software for any purpose.  It is provided "as is" without
  36.  * express or implied warranty.
  37.  */
  38.  
  39. #ifndef lint
  40. static char rcsid[] = "$Header: proto.c,v 1.2 88/03/11 08:39:08 ouster Exp $ SPRITE (Berkeley)";
  41. #endif not lint
  42.  
  43. #include <sprite.h>
  44. #include "bit.h"
  45. #include "bitInt.h"
  46.  
  47.  
  48. /*-
  49.  *-----------------------------------------------------------------------
  50.  *
  51.  * Bit_Union --
  52.  *
  53.  *    Take the union of two bit masks and store it some place.
  54.  *    If no destination is given (it's a NULL pointer), the union
  55.  *    is taken but the result isn't stored anyplace.
  56.  *
  57.  * Results:
  58.  *    Returns TRUE if the union is non-empty. Stores the
  59.  *    union in the destination array, overwriting its previous
  60.  *    contents.
  61.  *
  62.  * Side Effects:
  63.  *    The destination is overwritten.
  64.  *
  65.  *-----------------------------------------------------------------------
  66.  */
  67.  
  68. Boolean
  69. Bit_Union(numBits, src1Ptr, src2Ptr, destPtr)
  70.     int              numBits;      /* Number of bits in all arrays */
  71.     register int  *src1Ptr;     /* First source for union */
  72.     register int  *src2Ptr;     /* Second source for union */
  73.     register int  *destPtr;     /* Destination of union */
  74. {
  75.     register int  i;
  76.     register Boolean rval = FALSE;
  77.     register int  lastMask;
  78.  
  79.     GET_MASK_AND_INTS (numBits, i, lastMask);
  80.  
  81.     if (destPtr == (int *)NULL) {
  82.     /*
  83.      * No destination, just go through the union and return TRUE
  84.      * as soon as we find a non-empty member
  85.      */
  86.     while (i != 0) {
  87.         if (*src1Ptr | *src2Ptr) {
  88.         return(TRUE);
  89.         }
  90.         src1Ptr++; src2Ptr++; i--;
  91.     }
  92.     if (lastMask && ((*src1Ptr | *src2Ptr) & lastMask)) {
  93.         return (TRUE);
  94.     }
  95.     } else {
  96.     /*
  97.      * Have a destination. Form the union into it and set
  98.      * rval TRUE if any of the destination integers is non-zero.
  99.      */
  100.     while (i != 0) {
  101.         *destPtr = *src1Ptr | *src2Ptr;
  102.         if (*destPtr) {
  103.         rval = TRUE;
  104.         }
  105.         destPtr++; src1Ptr++; src2Ptr++; i--;
  106.     }
  107.     if (lastMask) {
  108.         int      src1 = *src1Ptr;
  109.         int      src2 = *src2Ptr;
  110.  
  111.         *destPtr &= ~lastMask;
  112.         *destPtr |= (src1 | src2) & lastMask;
  113.         if (*destPtr & lastMask) {
  114.         rval = TRUE;
  115.         }
  116.     }
  117.     }
  118.     return(rval);
  119. }
  120. @
  121.